inherited frmVoucherSpecial: TfrmVoucherSpecial
  Left = 430
  Top = 161
  Caption = #20973#35777#35828#26126
  PixelsPerInch = 96
  TextHeight = 12
  inherited pnlBottom: TPanel
    inherited btnOK: TcxButton
      Left = 259
      Visible = False
      ExplicitLeft = 259
    end
    inherited btnCancel: TcxButton
      Left = 342
      Caption = #36864#20986'(&X)'
      OptionsImage.Glyph.Data = {
        36030000424D3603000000000000360000002800000010000000100000000100
        1800000000000003000000000000000000000000000000000000FF00FFFF00FF
        C6C6C6FF00FFC6C6C6FF00FFFF00FFC6C6C6FF00FF000000000000FF00FFC6C6
        C6FF00FFFF00FFFF00FFFF00FFC6C6C6FF00FFFF00FFC6C6C6FF00FFC6C6C6FF
        00FFFF00FF000000FFFF00000000FF00FFFF00FFC6C6C6FF00FFFF00FFC6C6C6
        FF00FFC6C6C6FF00FFFF00FFC6C6C6FF00FFC6C6C6000000FFFF008484000000
        00C6C6C6FF00FFFF00FF000000000000000000000000000000000000FF00FFFF
        00FFC6C6C6000000FFFF00848400848400000000000000000000FF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FFFF00FFC6C6C6FF00FF000000FFFF008484008484
        00000000C6C6C6FF00FFFF00FFFF00FFFF00FFFF00FF000000C6C6C684848484
        8484848484000000FFFF00848400848400000000C6C6C6FF00FFFF00FFFF00FF
        FF00FFFF00FF000000000000848484848484848484000000FFFF008484008484
        00000000C6C6C6FF00FFFF00FFFF00FFC6C6C6C6C6C600000084840000000084
        8484848484000000FFFF00848484848400000000C6C6C6FF00FFFF00FF000000
        000000000000000000FFFF00848400000000848484000000FFFF000000008484
        00000000C6C6C6FF00FF000000FFFF00FFFF00FFFF00FFFF00FFFF00FFFF0084
        8400000000000000FFFF00848400848400000000C6C6C6FF00FF000000FFFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00848400848484000000FFFF008484008484
        00000000C6C6C6FF00FFFF00FFFF00FFFF00FFFF00FF000000FFFF0084840084
        8484848484000000FFFF00848400848400000000C6C6C6FF00FFFF00FFFF00FF
        FF00FFFF00FF000000848400848484848484848484000000FFFF008484008484
        00000000C6C6C6FF00FFFF00FFFF00FFFF00FFFF00FF000000FF00FF84848484
        8484848484848484000000FFFF00848400000000C6C6C6FF00FFFF00FFFF00FF
        FF00FFFF00FFFF00FFFF00FF848484848484848484848484848484000000FFFF
        00000000C6C6C6FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00000000
        0000000000000000000000000000000000000000FF00FFFF00FF}
      OptionsImage.NumGlyphs = 1
      OnClick = btnCancelClick
      ExplicitLeft = 342
    end
  end
  inherited Panel1: TPanel
    Height = 27
    ExplicitHeight = 27
    inherited labFuncDesc: TLabel
      Visible = False
    end
    inherited img3: TImage
      Left = 374
      ExplicitLeft = 374
    end
    inherited Bevel1: TBevel
      Top = 24
      ExplicitTop = 24
      ExplicitWidth = 425
    end
  end
  object moVouSpecial: TMemo [2]
    Left = 0
    Top = 27
    Width = 548
    Height = 261
    Align = alClient
    Lines.Strings = (
      'moVouSpecial')
    ScrollBars = ssVertical
    TabOrder = 2
  end
  object qrySpec: TUniQuery
    Connection = MainDM.UniConn
    Left = 108
    Top = 52
  end
  object qryVouword: TUniQuery
    Connection = MainDM.UniConn
    SQL.Strings = (
      'select id,name from tfd_vouword order by id')
    Left = 192
    Top = 52
  end
  object qryDeformityVouNo: TUniQuery
    Connection = MainDM.UniConn
    SQL.Strings = (
      
        'select * from f_getminvouno(:voucount,:firstdate,:lastdate,:minv' +
        'ouno,:filid)')
    Options.AutoPrepare = True
    Left = 308
    Top = 60
    ParamData = <
      item
        DataType = ftInteger
        Name = 'voucount'
        ParamType = ptInput
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = 'firstdate'
        ParamType = ptInput
        Value = 336d
      end
      item
        DataType = ftDateTime
        Name = 'lastdate'
        ParamType = ptInput
        Value = 366d
      end
      item
        DataType = ftInteger
        Name = 'minvouno'
        ParamType = ptInput
        Value = 1
      end
      item
        DataType = ftInteger
        Name = 'filid'
        ParamType = ptInput
        Value = 0
      end>
  end
  object spGetVoulostnoInfo: TUniStoredProc
    StoredProcName = 'p_getvoulostnoinfo'
    Connection = MainDM.UniConn
    Left = 196
    Top = 220
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftInteger
        Name = 'filid'
        ParamType = ptInput
        Size = 1852383333
        Value = nil
      end
      item
        DataType = ftString
        Name = 'sinfo'
        ParamType = ptInputOutput
        Size = 250
        Value = nil
      end
      item
        DataType = ftString
        Name = 'slostno'
        ParamType = ptInputOutput
        Size = 250
        Value = ''
      end>
    CommandStoredProcName = 'p_getvoulostnoinfo'
  end
  object spGetVouFillostnoInfo: TUniStoredProc
    StoredProcName = 'p_getvoufillostnoinfo'
    Connection = MainDM.UniConn
    Left = 308
    Top = 220
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftInteger
        Name = 'filid'
        ParamType = ptInput
        Value = nil
      end
      item
        DataType = ftString
        Name = 'sinfo'
        ParamType = ptInputOutput
        Size = 250
        Value = nil
      end
      item
        DataType = ftString
        Name = 'slostno'
        ParamType = ptInputOutput
        Size = 250
        Value = ''
      end>
    CommandStoredProcName = 'p_getvoufillostnoinfo'
  end
end
